<%@ Page language="VB" ClientTarget="DownLevel" %>
<script language="VB" runat="server">
Sub Page_Load()
If Page.IsPostBack Then
Validate()
If Not IsValid Then
If Not age_required.IsValid Then
errorMessage.Text = age_required.ErrorMessage & "<br>"
ElseIf Not age_range.IsValid Then
errorMessage.Text = age_range.ErrorMessage & "<br>"
End If
End If
End If
End Sub
</script>
<HTML>
<HEAD>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" >
</HEAD>
<body>
<form method="post" runat="server">
<asp:Label ID="errorMessage" Runat="server"></asp:Label>
<table>
<tr>
<td>
Age:
</td>
<td>
<asp:textbox runat="Server" columns="6" id="age"></asp:textbox>
</td>
<td>
<asp:requiredfieldvalidator runat="Server" id="age_required" controltovalidate="age" display="dynamic" errormessage="Age is required." EnableClientScript="False">
*
</asp:requiredfieldvalidator>
<asp:rangevalidator runat="Server" id="age_range" controltovalidate="age" display="dynamic" errormessage="Age must be an integer between 18 and 65." minimumvalue="18" maximumvalue="65" Type="Integer" EnableClientScript="False">
*
</asp:rangevalidator>
</td>
</tr>
</table>
<asp:button id="save_button" runat="Server" text="Save"></asp:button>
</form>
</body>
</HTML>